From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 1 Jun 2004 00:25:50 +0000 (+0000)
Subject: (vc-arch-state): Don't assume the file exists.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~22203
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=7b700e177ed45f1ba8bb0231f6aa254e40d4d64c;p=emacs.git

(vc-arch-state): Don't assume the file exists.
---

diff --git a/lisp/vc-arch.el b/lisp/vc-arch.el
index 6c67581a5a8..a439174556e 100644
--- a/lisp/vc-arch.el
+++ b/lisp/vc-arch.el
@@ -272,7 +272,7 @@ Return non-nil if FILE is unchanged."
 		;; Buh?  Unexpected format.
 		'edited
 	      (let ((ats (file-attributes file)))
-		(if (and (= (nth 7 ats) (string-to-number (match-string 2)))
+		(if (and (eq (nth 7 ats) (string-to-number (match-string 2)))
 			 (equal (format-time-string "%s" (nth 5 ats))
 				(match-string 1)))
 		    'up-to-date